function punto_1(mat_filtro,x_original, imagen_destino1,imagen_destino2,swap_file)
	fprintf('punto_1\n');
	fprintf('BEGIN %s\n',datestr(clock));
	%distorsionar las imagenes y mostrar las imagenes distorsionadas
	%Y=A1*X
	degra_Y=degradar(mat_filtro,x_original);
	save(sprintf('.\\swap\\%s',swap_file),'degra_Y');
	%se muestra la original
	imwrite(uint8(x_original),imagen_destino1,'jpg');
	%imagesc(x_original,colormap('gray'));
	%se muestra distorsionada
	imwrite(uint8(degra_Y),imagen_destino2,'jpg');
	%imagesc(degra_Y,colormap('gray'));
	%calcular el error relativo como ||X - Xaprox||/|| X ||
	fprintf('error relativo %s %f\n',imagen_destino1,errorRelativo(degra_Y,x_original));
	fprintf('END %s\n',datestr(clock));
end;
